home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / DOS / TOOLS / PC_DEMO.ZIP / BLOAD.BAS (.txt) < prev    next >
Encoding:
GW-BASIC  |  1987-04-15  |  419 b   |  7 lines
  1. 10  'This program loads a screen which was saved with a .BLD extension.          20 C = 80                        'or 40 for a 40-column screen
  2. 30  WIDTH 80                      'or 40 for a 40-column screen
  3. 40  OUT &H3D8,&H21                'video off (80-column only)
  4. 50  DEF SEG = &HB800              'set to first page of color screen
  5. 60  BLOAD "PICTURE.BLD",0
  6. 70  OUT &H3D8,&H29                'video on (80-column only)
  7.